; * which-key.el (which-key--get-keymap-bindings-1): Use eql.

diff --git a/which-key.el b/which-key.el
index 54ec92d2311440248531f1f69b5f4bf1b1a65235..dcb5af7ce7d27e6a7ace7249684b39ec5b25f553 100644 (file)
--- a/which-key.el
+++ b/which-key.el
@@ -1886,7 +1886,7 @@ Requires `which-key-compute-remaps' to be non-nil."
                   (or all
                       ;; event 27 is escape, so this will pick up meta
                       ;; bindings and hopefully not too much more
-                      (and (numberp ev) (= ev 27))))
+                      (eql ev 27)))
              (setq bindings
                    (which-key--get-keymap-bindings-1
                     keymap bindings key nil all ignore-commands)))